home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PsL Monthly 1993 December
/
PSL Monthly Shareware CD-ROM (December 1993).iso
/
prgmming
/
dos
/
c
/
boss
/
boss_sup.lzh
/
BOSSDEMO.C
< prev
next >
Wrap
Text File
|
1992-03-06
|
22KB
|
620 lines
/*
** Demo for The Window Boss
**
** Copyright (c) 1985-1990 - Philip A. Mongelluzzo
** All rights reserved.
**
*/
#include "winboss.h" /* windows header file */
#if DLC
int _stack = 8192; /* Datalight C */
#endif
#if BORLAND
unsigned _stklen = 8192;
#endif
#if __TSC__
#define MAXWIN 50 /* TopSpeed C */
#else
#define MAXWIN 100 /* for 100 windows */
#endif
WINDOWPTR wins[MAXWIN]; /* DONT INCREASE IN SMALL MODEL */
unsigned blue = BLUE; /* remap for mono */
/*
** Prototypes to keep the new ANSI Compilers Happy
*/
#if BORLAND | WATCOM | MSC
int main(int argc, char **argv);
int dedemo(void);
int pddemo(WINDOWPTR w);
int nap(int ticks);
int hiber(int seconds);
int chkesc(void);
int paktc(void);
#endif
main(argc,argv)
int argc;
char *argv[];
{
WINDOWPTR w2, w3; /* a few windows */
WINDOWPTR tw1, tw2, tw3; /* and a few more */
WINDOWPTR wn_qpopup(); /* function returns WP */
int i,j; /* scratch integers */
int t50rib; /* top 50 atrib */
int watrib,batrib; /* scratch atributes */
int rv; /* for popup */
int row,col; /* for 100 windows */
static struct pmenu m1 = {
00, FALSE, 00,
00, 00, {
01, 02, "Presenting", 0,
99, 99, "",99 }
};
static struct pmenu m2 = {
00, FALSE, 00,
00, 00, {
01, 02, "The", 0,
03, 02, "W i n d o w B O S S", 0,
05, 02, "Fast - Easy - Windows", 0,
07, 02, "for the C Language", 0,
99, 99, "",99 }
};
static struct pmenu intelc = {
00, FALSE, 00,
02, 06, {
01, 02, " Intellicom", 0,
02, 02, " Quick - Help", 0,
04, 05, "1 General Information ", 1,
05, 05, "2 Terminal Mode Options", 2,
06, 05, "3 XMODEM File Send ", 3,
07, 05, "4 XMODEM File Receive ", 4,
#if MSC | DLC | CI86 | LC3
8, 05, "5 CompuServe Exec Mode ", 5,
#else
08, 05, "5 CompuServe Exec Mode ", 5,
#endif
10, 02, "Press: ESC to quit or Cursor", 0,
11, 02, " Keys to Position Cursor then", 0,
12, 02, " press RETURN for MORE info.", 0,
99, 99, "",99 }
};
if(argc > 2) wn_dmaflg=FALSE; /* for testing bios access */
if(wns_mtflg == 7) blue = BLACK; /* remap if mono */
if(argc > 1) wn_dmode(PAINT); /* pretend CGA */
wn_init(); /* save entry screen */
batrib = v_setatr(WHITE,BLACK,0,BOLD);/* set border atrib */
watrib = v_setatr(WHITE,RED,0,0); /* make it american */
w2 = wn_qpopup(0,0,0,16,3,watrib,batrib,&m1);
for(i=1; i<11; i++) /* move it into place */
w2 = wn_move(w2, i, i*2);
hiber(1); /* wait 1 second (aprx) */
batrib = v_setatr(RED,WHITE,0,BOLD); /* set border atrib */
watrib = v_setatr(blue,WHITE,0,BOLD); /* make this american too */
w3 = wn_qpopup(0,0,0,30,9,watrib|BOLD,batrib,&m2);
for(i=1; i<8; i++) /* move into place */
w3 = wn_move(w3,i,6*i); /* move into place */
hiber(5); /* reading time.. */
wn_clr(w3);
wn_title(w3," PLEASE NOTE ");
wn_printf(w3,"\n");
wn_printf(w3,"This demo contains reading\n");
wn_printf(w3,"time delays that you can\n");
wn_printf(w3,"shorten by pressing the ESC\n");
wn_printf(w3,"key.\n\n");
wn_printf(w3,"Press any key to continue...");
paktc();
wn_close(w3); /* close a couple */
hiber(1);
wn_close(w2);
hiber(1);
watrib = v_setatr(WHITE,BLACK,0,BOLD);
for(i=0; i<25; i++) { /* build the back drop */
v_locate(0,i,0); /* position cursor */
v_wca(0, 0xb0, watrib, 80); /* the fast way */
}
v_hidec(); /* hide the cursor */
watrib = v_setatr(WHITE,BLACK,0,0); /* window attribute */
batrib = v_setatr(blue,WHITE,0,0); /* border attribute */
w3 = wn_open(800,1,9,60,21,watrib,batrib);
w3->bstyle |= BOLD; /* toggle bold on then off */
wn_title(w3," The Window BOSS for C ");
w3->bstyle ^= BOLD;
wn_puts(w3,1,1,"The Window BOSS puts YOU in control of the most important");
wn_puts(w3,2,1,"sophisticated state-of-the-art screen handling techniques");
wn_puts(w3,3,1,"available today. Pop-up windows, pull-down menus, status ");
wn_puts(w3,4,1,"lines and context sensitive help functions are a breeze ");
wn_puts(w3,5,1,"to implement! Your program automatically senses the ");
wn_puts(w3,6,1,"video card installed and ALL your video output takes ");
wn_puts(w3,7,1,"place with no snow, no flicker, and no delay. But best of");
wn_puts(w3,8,1,"all, The Window BOSS is available as SHAREWARE software!");
wn_puts(w3,9,1," ");
wn_puts(w3,10,1,"The Window BOSS is available for compilers from Microsoft,");
wn_puts(w3,11,1,"Borland, WATCOM, Mix, JPI, Zortech, and Lattice. Users who");
wn_puts(w3,12,1,"register receive complete documentation, all source code,");
wn_puts(w3,13,1,"and support for all your compilers memory models!! ");
wn_puts(w3,14,1," ");
wn_puts(w3,15,1,"I challenge you to compare: The Window BOSS is faster");
wn_puts(w3,16,1,"and easier to use than most commercial products on the");
wn_puts(w3,17,1,"market today! Others seem to agree too! Browse through");
wn_puts(w3,18,1,"the Cosmetic Surgery article in the September '91 issue");
wn_puts(w3,19,1,"of Computer Language Magazine for starters....");
hiber(30);
wn_clr(w3);
wn_puts(w3, 1,1,"Tim Parker's column in the February 87 issue of Computer ");
wn_puts(w3, 2,1,"Language stated \"the ease of use will cause some ");
wn_puts(w3, 3,1,"programmers to go overboard with windows\", and \"if you ");
wn_puts(w3, 4,1,"are a die-hard C programmer looking for a useful, ");
wn_puts(w3, 5,1,"license-free product, this is it\".");
wn_puts(w3, 6,1," ");
wn_puts(w3, 7,1,"Hardin Bothers' column in the June 88 issue of PC ");
wn_puts(w3, 8,1,"Resource stated \"Within its domain, The Window BOSS is ");
wn_puts(w3, 9,1,"as useful and as powerful as any C library I've used\". ");
wn_puts(w3,10,1,"\"The Window BOSS owes much of its power to its ");
wn_puts(w3,11,1,"uncluttered organization. Although the product supports ");
wn_puts(w3,12,1,"five C Compilers - Microsoft C, Lattice C, Borland's ");
wn_puts(w3,13,1,"Turbo C, Computer Innovations CI86, and Datalight C - it ");
wn_puts(w3,14,1,"does it with a minimum of fuss\".");
wn_puts(w3,15,1," ");
wn_puts(w3,16,1,"The BOSS is currently being used by dozens of Fortune ");
wn_puts(w3,17,1,"500 Companies, numerous universities, and discriminating ");
wn_puts(w3,18,1,"\"C\" programmers around the world! Haven't you waited ");
wn_puts(w3,19,1,"long enough?");
hiber(30);
wn_clr(w3);
wn_puts(w3, 1,1," Psst...");
wn_puts(w3, 2,1," ");
wn_puts(w3, 3,1," The Window BOSS is one of ");
wn_puts(w3, 4,1," PC-SIG's TOP 50 Best Selling Programs");
wn_puts(w3, 5,1," ");
wn_puts(w3, 6,1," ██████ █████ █████ ");
wn_puts(w3, 7,1," ██ █ █ █ █");
wn_puts(w3, 8,1," ██ █ █ █████");
wn_puts(w3, 9,1," ██ █ █ ██");
wn_puts(w3,10,1," ██ █████ ██");
wn_puts(w3,11,1," ");
wn_puts(w3,12,1," █████ █████");
wn_puts(w3,13,1," █ █ █");
wn_puts(w3,14,1," █████ █ █");
wn_puts(w3,15,1," █ █ █");
wn_puts(w3,16,1," █████ █████");
wn_puts(w3,17,1," ");
wn_puts(w3,18,1," Shareware Magazine Jan-Feb 1990");
wn_puts(w3,19,1," ");
for(j=0; j<=WHITE; j++) {
t50rib = v_setatr(W